www.gusucode.com > 婚庆仪礼策划公司网站系统源代码 梦紫色 > 婚庆仪礼策划公司网站系统源代码 梦紫色/Admin/upinc.asp

    <%Server.ScriptTimeOut=5000%>
<style type="text/css">
*{ padding:0px; margin:0px; font-size:12px}
a{ color:#666666;}
a:hover{ color:#000000}
</style>
<!--#include FILE="upload_5xsoft.inc"-->
<%
f="tu/" '图片存放文件夹路径
n=request.QueryString("n")
x=request.QueryString("x")
m=request("m")
if m="ok" then
set upload=new upload_5xsoft
set file=upload.file("file1")
formPath=f
if file.fileSize>0 then
 file.saveAs Server.mappath(formPath&file.FileName)
 %>
 <script> 
 <%if x=1 then%>
 parent.document.all.<%=n%>.value=parent.document.all.<%=n%>.value+"[IMG]<%=f%><%=File.FileName%>[/IMG]";
 <%else%>
  parent.document.all.<%=n%>.value="<%=f%><%=File.FileName%>";
 <%end if%>
</script> 

 <input value="<%=f%><%=File.FileName%>" name="text" type="hidden">
<a href="#" onclick="window.clipboardData.setData('text',text.value);">[复制地址]</a>&nbsp;<a href="upinc.asp?n=<%=n%>&x=<%=x%>">[继续上传]</a>
 <%
end if
set file=nothing
set upload=nothing
else
%>
<form name="form1" method="post" action="upinc.asp?m=ok&n=<%=n%>&x=<%=x%>" enctype="multipart/form-data" style="margin:0px; margin:0px;" >
<input type="file" name="file1" style="width:200" class="tx1" value=""><input name="" type="submit" value="上传" />
</form>
<%end if%>